Public Class prod_default
    Inherits System.Web.UI.Page
    'Protected WithEvents TheHeader1 As adm_header
    Public aUserSession(13) As String
    Public imgpath, currtURL As String
    Dim objdata As New gaValidation
#Region " Web Form Designer Generated Code "

    'This call is required by the Web Form Designer.
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    End Sub

    'NOTE: The following placeholder declaration is required by the Web Form Designer.
    'Do not delete or move it.
    Private designerPlaceholderDeclaration As System.Object

    Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
        'CODEGEN: This method call is required by the Web Form Designer
        'Do not modify it using the code editor.
        InitializeComponent()
    End Sub

#End Region

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'Put user code to initialize the page here
        
        If (Session("admin_ID") <> Nothing And Session("admin_ID") <> "") Then
            objdata.getURL(Request.Url.ToString, imgpath, currtURL)
            Response.Write(BuildWebContext())
        Else
            Response.Redirect("../adm_login.aspx")
        End If
    End Sub
    Private Function BuildWebContext() As String
        Dim strHtml As String
        strHtml = "<table><tr><td>"
        strHtml += "The Category management Menu allows you to publish a new category and subcategory in english and chinese."
        'strHtml += "<ul><li><a href='./adm_addproduct.aspx'>Add New Product</a></li>"
        'strHtml += "<li><a href='./adm_findproduct.aspx'>Find/Edit Product</a></li>"
        'strHtml += "<li><a href='./adm_uploadphoto.aspx'>Upload Photo</a></li>"
        strHtml += "<ul><li><a href='./adm_findCategory.aspx'>Find/Edit Category(English)</a></li>"
        strHtml += "<li><a href='./adm_cn_findCategory.aspx'>Find/Edit Category(Chinese)</a></li>"
        strHtml += "<li><a href='./adm_addCategory.aspx'>Create New Category</a></li></ul></td></tr></table>"
        Return strHtml
    End Function
End Class
